object ClockSetup: TClockSetup Left = 0 Top = 0 Width = 701 Height = 460 TabOrder = 0 object GroupBox_SystemSettings: TGroupBox Left = 0 Top = 270 Width = 450 Height = 80 Caption = 'System Settings' TabOrder = 2 object CheckBox_Autoload: TCheckBox Left = 16 Top = 24 Width = 217 Height = 17 Caption = 'Load automatically when Windows starts' TabOrder = 0 OnClick = CheckBox_AutoloadClick end object CheckBox_NoCustomize: TCheckBox Left = 16 Top = 47 Width = 137 Height = 17 Caption = 'Do not customize clock' TabOrder = 1 OnClick = CheckBox_NoCustomizeClick end object Button_AdvancedSettings: TButton Left = 304 Top = 40 Width = 131 Height = 25 Caption = 'Advanced Settings ...' TabOrder = 2 OnClick = Button_AdvancedSettingsClick end end object GroupBox_FormatSetup: TGroupBox Left = 0 Top = 24 Width = 450 Height = 100 Caption = 'Format Settings' TabOrder = 0 object Label_FormatFor: TLabel Left = 16 Top = 20 Width = 20 Height = 13 Caption = 'Item' end object Label_FormatString: TLabel Left = 144 Top = 20 Width = 62 Height = 13 Caption = 'Format String' end object ComboBox_CopyFormat: TComboBox Left = 144 Top = 65 Width = 145 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 4 Visible = False OnChange = ComboBox_CopyFormatChange Items.Strings = ( 'Customize' 'Same as Clock' 'Same as Tooltip') end object ComboBox_FormatItem: TComboBox Left = 16 Top = 36 Width = 121 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 OnChange = ComboBox_FormatItemChange Items.Strings = ( 'Clock' 'Tooltip' 'Copy-to-clipboard') end object Button_Elements: TButton Left = 328 Top = 63 Width = 105 Height = 25 Caption = 'Format Elements ...' Default = True TabOrder = 2 OnClick = Button_ElementsClick end object Edit_Format: TEdit Left = 144 Top = 36 Width = 289 Height = 21 HideSelection = False TabOrder = 1 OnChange = Edit_FormatChange end object Edit_FixedWidth: TEdit Left = 232 Top = 65 Width = 57 Height = 21 TabOrder = 5 OnChange = Edit_FixedWidthChange end object CheckBox_UseFixedWidth: TCheckBox Left = 144 Top = 67 Width = 81 Height = 17 Caption = 'Fixed width' TabOrder = 3 OnClick = CheckBox_UseFixedWidthClick end end object GroupBox_FontSetup: TGroupBox Left = 0 Top = 128 Width = 450 Height = 138 Caption = 'Layout Settings' TabOrder = 1 object Label_FontValue: TLabel Left = 16 Top = 62 Width = 185 Height = 13 AutoSize = False Caption = '_value_' end object Shape_ForeColor: TShape Left = 408 Top = 22 Width = 25 Height = 25 end object Shape_BackColor: TShape Left = 408 Top = 78 Width = 25 Height = 25 end object Bevel1: TBevel Left = 216 Top = 16 Width = 17 Height = 113 Shape = bsLeftLine end object Button_ChangeFont: TButton Left = 16 Top = 78 Width = 185 Height = 25 Caption = 'Font ...' TabOrder = 2 OnClick = Button_ChangeFontClick end object CheckBox_UseCustomFont: TCheckBox Left = 24 Top = 106 Width = 177 Height = 17 Caption = 'Use Custom Font' TabOrder = 3 OnClick = CheckBox_UseCustomFontClick end object Button_ChangeForeColor: TButton Left = 232 Top = 22 Width = 169 Height = 25 Caption = 'Text Color ...' TabOrder = 4 OnClick = Button_ChangeForeColorClick end object CheckBox_UseCustomForeground: TCheckBox Left = 240 Top = 50 Width = 145 Height = 17 Caption = 'Use Custom Text Color' TabOrder = 5 OnClick = CheckBox_UseCustomForegroundClick end object Button_ChangeBackColor: TButton Left = 232 Top = 78 Width = 169 Height = 25 Caption = 'Background Color ...' TabOrder = 6 OnClick = Button_ChangeBackColorClick end object CheckBox_UseCustomBackground: TCheckBox Left = 240 Top = 106 Width = 145 Height = 17 Caption = 'Use Custom Background' TabOrder = 7 OnClick = CheckBox_UseCustomBackgroundClick end object Edit_InternalBorder: TEdit Left = 144 Top = 24 Width = 57 Height = 21 TabOrder = 1 OnChange = Edit_InternalBorderChange end object CheckBox_UseInternalBorder: TCheckBox Left = 16 Top = 26 Width = 124 Height = 17 Caption = 'Internal Border width' TabOrder = 0 OnClick = CheckBox_UseInternalBorderClick end end object Panel_Caption: TPanel Left = 0 Top = 0 Width = 450 Height = 20 BevelOuter = bvNone TabOrder = 3 object Shap_Caption: TShape Left = 0 Top = 0 Width = 450 Height = 20 Align = alClient Brush.Color = 12937777 end object Label_Caption: TLabel Left = 6 Top = 1 Width = 88 Height = 16 Caption = 'Taskbar Clock' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True end end object FontDialog: TFontDialog Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Left = 336 Top = 256 end object ColorDialog_ForeColor: TColorDialog Left = 376 Top = 256 end object ColorDialog_BackColor: TColorDialog Left = 408 Top = 256 end object PopupMenu_Elements: TPopupMenu Left = 296 Top = 256 object SubMenu_Samples: TMenuItem Caption = 'Sample Formats' object MenuItem_sample1: TMenuItem Caption = 'Thu, 1 Jan 1998' OnClick = MenuItem_sample1Click end object MenuItem_sample2: TMenuItem Caption = 'January 01, 1998' OnClick = MenuItem_sample2Click end object MenuItem_sample3: TMenuItem Caption = '1 Jan '#39'98 (Thu)' OnClick = MenuItem_sample3Click end object MenuSeparator_Sample1: TMenuItem Caption = '-' end object MenuItem_sample4: TMenuItem Caption = '31/01/1998' OnClick = MenuItem_sample4Click end object MenuItem_sample5: TMenuItem Caption = '01-31-1998' OnClick = MenuItem_sample5Click end object MenuItem_sample6: TMenuItem Caption = '98.01.31' OnClick = MenuItem_sample6Click end object MenuSeparator_Sample2: TMenuItem Caption = '-' end object MenuItem_sample7: TMenuItem Caption = '3.00 pm' OnClick = MenuItem_sample7Click end object MenuItem_sample8: TMenuItem Caption = '15h00' OnClick = MenuItem_sample8Click end object MenuItem_sample9: TMenuItem Caption = '03:00:00 p' OnClick = MenuItem_sample9Click end end object SubMenu_Default: TMenuItem Caption = 'Default Formats' object MenuItem_default1: TMenuItem Caption = 'Default Short Time'#9'%time' OnClick = MenuItem_default1Click end object MenuItem_default2: TMenuItem Caption = 'Default Long Time'#9'%longtime' OnClick = MenuItem_default2Click end object MenuSeparator_Default1: TMenuItem Caption = '-' end object MenuItem_default3: TMenuItem Caption = 'Default Short Date'#9'%date' OnClick = MenuItem_default3Click end object MenuItem_default4: TMenuItem Caption = 'Default Long Date'#9'%longdate' OnClick = MenuItem_default4Click end end object MenuSeparator2: TMenuItem Caption = '-' end object SubMenu_TimeElements: TMenuItem Caption = 'Time Elements' object MenuItem_hour1: TMenuItem Caption = 'Hour (1-12)'#9'h' OnClick = MenuItem_hour1Click end object MenuItem_hour2: TMenuItem Caption = 'Hour (01-12)'#9'hh' OnClick = MenuItem_hour2Click end object MenuItem_hour3: TMenuItem Caption = 'Hour (0-23)'#9'H' OnClick = MenuItem_hour3Click end object MenuItem_hour4: TMenuItem Caption = 'Hour (00-23)'#9'HH' OnClick = MenuItem_hour4Click end object MenuSeparator_Time1: TMenuItem Caption = '-' end object MenuItem_min1: TMenuItem Caption = 'Minute (0-59)'#9'm' OnClick = MenuItem_min1Click end object MenuItem_min2: TMenuItem Caption = 'Minute (00-59)'#9'mm' OnClick = MenuItem_min2Click end object MenuSeparator_Time2: TMenuItem Caption = '-' end object MenuItem_sec1: TMenuItem Caption = 'Second (0-59)'#9's' OnClick = MenuItem_sec1Click end object MenuItem_sec2: TMenuItem Caption = 'Second (00-59)'#9'ss' OnClick = MenuItem_sec2Click end object MenuSeparator_Time3: TMenuItem Caption = '-' end object MenuItem_ampm1: TMenuItem Caption = 'A/P'#9't' OnClick = MenuItem_ampm1Click end object MenuItem_ampm2: TMenuItem Caption = 'AM/PM'#9'tt' OnClick = MenuItem_ampm2Click end object MenuSeparator_Time4: TMenuItem Caption = '-' end object MenuItem_tz1: TMenuItem Caption = 'Timezone Bias'#9'zz' OnClick = MenuItem_tz1Click end object MenuItem_tz2: TMenuItem Caption = 'Timezone Name'#9'ZZ' OnClick = MenuItem_tz2Click end end object SubMenu_DateElements: TMenuItem Caption = 'Date Elements' object MenuItem_day1: TMenuItem Caption = 'Day'#9'd' OnClick = MenuItem_day1Click end object MenuItem_day2: TMenuItem Caption = 'Day (2 digits)'#9'dd' OnClick = MenuItem_day2Click end object MenuItem_day3: TMenuItem Caption = 'Day Name (abbr.)'#9'ddd' OnClick = MenuItem_day3Click end object MenuItem_day4: TMenuItem Caption = 'Day Name (full)'#9'dddd' OnClick = MenuItem_day4Click end object MenuSeparator_Date1: TMenuItem Caption = '-' end object MenuItem_month1: TMenuItem Caption = 'Month'#9'M' OnClick = MenuItem_month1Click end object MenuItem_month2: TMenuItem Caption = 'Month (2 digits)'#9'MM' OnClick = MenuItem_month2Click end object MenuItem_month3: TMenuItem Caption = 'Month Name (abbr.)'#9'MMM' OnClick = MenuItem_month3Click end object MenuItem_month4: TMenuItem Caption = 'Month Name (full)'#9'MMMM' OnClick = MenuItem_month4Click end object MenuSeparator_Date2: TMenuItem Caption = '-' end object MenuItem_year1: TMenuItem Caption = 'Year (2 digits)'#9'yy' OnClick = MenuItem_year1Click end object MenuItem_year2: TMenuItem Caption = 'Year (4 digits)'#9'yyyy' OnClick = MenuItem_year2Click end object MenuSeparator_Date3: TMenuItem Caption = '-' end object MenuItem_dayord1: TMenuItem Caption = 'Day of Year'#9'D' OnClick = MenuItem_dayord1Click end object MenuItem_dayord2: TMenuItem Caption = 'Day of Year (3 digits)'#9'DDD' OnClick = MenuItem_dayord2Click end object MenuItem_week1: TMenuItem Caption = 'Week Number'#9'w' OnClick = MenuItem_week1Click end object MenuItem_week2: TMenuItem Caption = 'Week Number (2 digits)'#9'ww' OnClick = MenuItem_week2Click end end object SubMenu_ResourceElements: TMenuItem Caption = 'Resource Elements' object MenuItem_CPUUsage: TMenuItem Caption = 'CPU Usage (%)'#9'%cpu' OnClick = MenuItem_CPUUsageClick end object MenuSeparator_Resource1: TMenuItem Caption = '-' end object MenuItem_Mem1: TMenuItem Caption = 'Physical memory (RAM) load (%)'#9'%mem' OnClick = MenuItem_Mem1Click end object MenuItem_Mem2: TMenuItem Caption = 'Physical memory (RAM) available (MB)'#9'%mema' OnClick = MenuItem_Mem2Click end object MenuItem_Mem3: TMenuItem Caption = 'Physical memory (RAM) total (MB)'#9'%memt' OnClick = MenuItem_Mem3Click end object MenuSeparator_Resource2: TMenuItem Caption = '-' end object MenuItem_Power1: TMenuItem Caption = 'AC line status (On/Off)'#9'%ac' OnClick = MenuItem_Power1Click end object MenuItem_Power2: TMenuItem Caption = 'Battery life (%)'#9'%batt' OnClick = MenuItem_Power2Click end object MenuItem_Power3: TMenuItem Caption = 'Battery life time (hh:mm)'#9'%timebatt' OnClick = MenuItem_Power3Click end end object MenuSeparator1: TMenuItem Caption = '-' end object MenuItem_SingleQuote: TMenuItem Caption = 'Single Quote'#9'%sq' OnClick = MenuItem_SingleQuoteClick end object Invisibleseparator1: TMenuItem Caption = 'Invisible separator'#9'~' OnClick = Invisibleseparator1Click end object Linebreak1: TMenuItem Caption = 'Line break'#9'|' OnClick = Linebreak1Click end object MenuItem_LiteralText: TMenuItem Caption = 'Literal Text'#9#39'..'#39 OnClick = MenuItem_LiteralTextClick end end object IdHTTP1: TIdHTTP MaxLineAction = maException AllowCookies = True ProxyParams.BasicAuthentication = False ProxyParams.ProxyPort = 0 Request.ContentLength = -1 Request.ContentRangeEnd = 0 Request.ContentRangeStart = 0 Request.Accept = 'text/html, */*' Request.BasicAuthentication = False Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)' HTTPOptions = [hoForceEncodeParams] Left = 232 Top = 312 end object IdAntiFreeze1: TIdAntiFreeze Left = 264 Top = 312 end end